global cmpCapitalP := Map()
global cmpSmallR := Map()
global cmpAsterisk := Map()
global cmpCapitalP := Map()
global cmpSmallR := Map()
global cmpAsterisk := Map()
cmpSmallN["o"] := "{u+2116}" ; (№) numero sign
cmpCapitalN["o"] := "{u+2116}" ; (№) numero sign
cmpRingAbove["x"] := "{u+00a4}" ; (¤) currency sign
cmpSmallN["o"] := "{u+2116}" ; (№) numero sign
cmpCapitalN["o"] := "{u+2116}" ; (№) numero sign
cmpRingAbove["x"] := "{u+00a4}" ; (¤) currency sign
cmpCapitalP["P"] := "{u+00b6}" ; (¶) pilcrow sign
cmpSmallR["2"] := "{u+221a}" ; (√) square root
cmpSmallR["3"] := "{u+221b}" ; (∛) cube root
cmpCapitalP["P"] := "{u+00b6}" ; (¶) pilcrow sign
cmpSmallR["2"] := "{u+221a}" ; (√) square root
cmpSmallR["3"] := "{u+221b}" ; (∛) cube root
else if (ihA.Input == "P") {
if cmpCapitalP.Has(ihB.Input)
Send cmpCapitalP[ihB.Input]
else if (ihA.Input == "P") {
if cmpCapitalP.Has(ihB.Input)
Send cmpCapitalP[ihB.Input]